﻿Imports Equipment.DataAccess

Imports System

Imports System.Web.Mvc

Imports Microsoft.VisualStudio.TestTools.UnitTesting.Web

Imports Microsoft.VisualStudio.TestTools.UnitTesting

Imports Equipment.Equipment



'''<summary>
'''This is a test class for WorkOrderControllerTest and is intended
'''to contain all WorkOrderControllerTest Unit Tests
'''</summary>
<TestClass()> _
Public Class WorkOrderControllerTest


    Private testContextInstance As TestContext

    '''<summary>
    '''Gets or sets the test context which provides
    '''information about and functionality for the current test run.
    '''</summary>
    Public Property TestContext() As TestContext
        Get
            Return testContextInstance
        End Get
        Set(value As TestContext)
            testContextInstance = Value
        End Set
    End Property

#Region "Additional test attributes"
    '
    'You can use the following additional attributes as you write your tests:
    '
    'Use ClassInitialize to run code before running the first test in the class
    '<ClassInitialize()>  _
    'Public Shared Sub MyClassInitialize(ByVal testContext As TestContext)
    'End Sub
    '
    'Use ClassCleanup to run code after all tests in a class have run
    '<ClassCleanup()>  _
    'Public Shared Sub MyClassCleanup()
    'End Sub
    '
    'Use TestInitialize to run code before running each test
    '<TestInitialize()>  _
    'Public Sub MyTestInitialize()
    'End Sub
    '
    'Use TestCleanup to run code after each test has run
    '<TestCleanup()>  _
    'Public Sub MyTestCleanup()
    'End Sub
    '
#End Region


'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for WorkOrderController Constructor
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub WorkOrderControllerConstructorTest()
    Dim target As WorkOrderController = New WorkOrderController()
    Assert.Inconclusive("TODO: Implement code to verify target")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Create
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub CreateTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim collection As FormCollection = Nothing ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Create(collection)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Create
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub CreateTest1()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Create(id)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Delete
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub DeleteTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Integer = 0 ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Delete(id)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Delete
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub DeleteTest1()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Integer = 0 ' TODO: Initialize to an appropriate value
Dim collection As FormCollection = Nothing ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Delete(id, collection)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Details
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub DetailsTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Integer = 0 ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Details(id)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Edit
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub EditTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Integer = 0 ' TODO: Initialize to an appropriate value
Dim collection As FormCollection = Nothing ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Edit(id, collection)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Edit
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub EditTest1()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Integer = 0 ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Edit(id)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for FilterAsset
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub FilterAssetTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim assetTypeID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim groupID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.FilterAsset(assetTypeID, groupID)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for FilterPostingWorkOrder
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub FilterPostingWorkOrderTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim assetTypeID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim locationID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim strDateFrom As String = String.Empty ' TODO: Initialize to an appropriate value
Dim strDateTo As String = String.Empty ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.FilterPostingWorkOrder(assetTypeID, locationID, strDateFrom, strDateTo)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for FilterReviewWorkOrder
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub FilterReviewWorkOrderTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim assetTypeID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim locationID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim groupID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim strDateFrom As String = String.Empty ' TODO: Initialize to an appropriate value
Dim strDateTo As String = String.Empty ' TODO: Initialize to an appropriate value
Dim status As String = String.Empty ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.FilterReviewWorkOrder(assetTypeID, locationID, groupID, strDateFrom, strDateTo, status)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for FilterWorkOrder
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub FilterWorkOrderTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim assetTypeID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim locationID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim groupID As Nullable(Of Integer) = New Nullable(Of Integer)() ' TODO: Initialize to an appropriate value
Dim strDateFrom As String = String.Empty ' TODO: Initialize to an appropriate value
Dim strDateTo As String = String.Empty ' TODO: Initialize to an appropriate value
Dim status As String = String.Empty ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.FilterWorkOrder(assetTypeID, locationID, groupID, strDateFrom, strDateTo, status)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for GetAssetByID
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub GetAssetByIDTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Integer = 0 ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.GetAssetByID(id)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for GetAssetTypesByDepartment
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub GetAssetTypesByDepartmentTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Integer = 0 ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.GetAssetTypesByDepartment(id)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for GetAssetsByDepartmentAndType
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub GetAssetsByDepartmentAndTypeTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Integer = 0 ' TODO: Initialize to an appropriate value
Dim typeID As Integer = 0 ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.GetAssetsByDepartmentAndType(id, typeID)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for GetLatestWorkOrderByAssetID
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub GetLatestWorkOrderByAssetIDTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim id As Integer = 0 ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.GetLatestWorkOrderByAssetID(id)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for GetLatestWorkOrderLinkByAssetBarCode
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub GetLatestWorkOrderLinkByAssetBarCodeTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim barcode As String = String.Empty ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.GetLatestWorkOrderLinkByAssetBarCode(barcode)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for GetLatestWorkOrderLinkByAssetName
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub GetLatestWorkOrderLinkByAssetNameTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim name As String = String.Empty ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.GetLatestWorkOrderLinkByAssetName(name)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Index
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub IndexTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Index
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for InitPostingControls
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/"),  _
 DeploymentItem("Equipment.dll")>  _
Public Sub InitPostingControlsTest()
Dim target As WorkOrderController_Accessor = New WorkOrderController_Accessor() ' TODO: Initialize to an appropriate value
    target.InitPostingControls
    Assert.Inconclusive("A method that does not return a value cannot be verified.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for InitReviewControls
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/"),  _
 DeploymentItem("Equipment.dll")>  _
Public Sub InitReviewControlsTest()
Dim target As WorkOrderController_Accessor = New WorkOrderController_Accessor() ' TODO: Initialize to an appropriate value
    target.InitReviewControls
    Assert.Inconclusive("A method that does not return a value cannot be verified.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for InitWorkOrderControls
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/"),  _
 DeploymentItem("Equipment.dll")>  _
Public Sub InitWorkOrderControlsTest()
Dim target As WorkOrderController_Accessor = New WorkOrderController_Accessor() ' TODO: Initialize to an appropriate value
Dim currWorkOrder As WorkOrder = Nothing ' TODO: Initialize to an appropriate value
Dim currWorkOrderExpected As WorkOrder = Nothing ' TODO: Initialize to an appropriate value
    target.InitWorkOrderControls(currWorkOrder)
    Assert.AreEqual(currWorkOrderExpected, currWorkOrder)
    Assert.Inconclusive("A method that does not return a value cannot be verified.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for PostWorkOrder
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/"),  _
 DeploymentItem("Equipment.dll")>  _
Public Sub PostWorkOrderTest()
Dim target As WorkOrderController_Accessor = New WorkOrderController_Accessor() ' TODO: Initialize to an appropriate value
Dim wo As WorkOrder = Nothing ' TODO: Initialize to an appropriate value
    target.PostWorkOrder(wo)
    Assert.Inconclusive("A method that does not return a value cannot be verified.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Posting
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub PostingTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim collection As FormCollection = Nothing ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Posting(collection)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Posting
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub PostingTest1()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Posting
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for RequirementList
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub RequirementListTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim assetTypeID As Integer = 0 ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.RequirementList(assetTypeID)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Review
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub ReviewTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Review
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for Review
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub ReviewTest1()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim collection As FormCollection = Nothing ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.Review(collection)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for SearchAssetByBarCode
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub SearchAssetByBarCodeTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim q As String = String.Empty ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.SearchAssetByBarCode(q)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for SearchAssetByName
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub SearchAssetByNameTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim q As String = String.Empty ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.SearchAssetByName(q)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

'TODO: Ensure that the UrlToTest attribute specifies a URL to an ASP.NET page (for example,
' http://.../Default.aspx). This is necessary for the unit test to be executed on the web server,
' whether you are testing a page, web service, or a WCF service.
'''<summary>
'''A test for SearchAssetByNameAndID
'''</summary>
<TestMethod(),  _
 HostType("ASP.NET"),  _
 AspNetDevelopmentServerHost("d:\Projects\Equipment\Equipment\Equipment", "/"),  _
 UrlToTest("http://localhost:17196/")>  _
Public Sub SearchAssetByNameAndIDTest()
Dim target As WorkOrderController = New WorkOrderController() ' TODO: Initialize to an appropriate value
Dim q As String = String.Empty ' TODO: Initialize to an appropriate value
Dim expected As ActionResult = Nothing ' TODO: Initialize to an appropriate value
    Dim actual As ActionResult
    actual = target.SearchAssetByNameAndID(q)
    Assert.AreEqual(expected, actual)
    Assert.Inconclusive("Verify the correctness of this test method.")
End Sub

End Class
